home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / ab20 / ab20_archive / games / strategy / madgic-corewar-4.0.lzh / 1988 / sud.s < prev    next >
Text File  |  1989-10-04  |  986b  |  46 lines
  1. ;SUD
  2. ;by Giovanni Ciraulo 
  3. ;Italy
  4. ;
  5.        DAT          0
  6.        DAT          0
  7.        DAT          0
  8.        DAT          0
  9.        DAT          0
  10.        DAT          0
  11.        DAT          0
  12.        DAT          0
  13.        DAT          0
  14.        DAT          0
  15.        DAT          0
  16.        DAT          0
  17.        DAT          0
  18.        DAT          0
  19.        DAT          0
  20.        DAT          0 
  21. P      DAT          2064
  22. Q      DAT          -2070
  23. START  ADD  # 16,      P
  24.        SUB  # 11,      Q
  25.        CMP  @ P,     @ Q
  26.        JMP   B,
  27. CONTR  JMN   START,     P
  28. A      ADD  # 1,       BOMB
  29.        MOV   BOMB,    @ BOMB
  30.        MOV   TNT,    < TNT
  31.        JMP   A
  32. BOMB   DAT          TZP
  33. TNT    DAT          A
  34. B      SUB  # 4,       P
  35.        ADD  # 4,       Q
  36. BA     MOV   DDT,    @ P
  37.        MOV   DDT,    @ Q
  38. TZP    ADD  # 2,       P
  39.        SUB  # 2,       Q
  40.        DJN   BA,      T
  41.        ADD  # 10,      T
  42.        JMP   CONTR
  43. DDT    SPL          DDT
  44. T      DAT          10
  45.        END   START
  46.